home *** CD-ROM | disk | FTP | other *** search
/ Just Call Me Internet / Just Call Me Internet.iso / prog / atari / m2 / cat3src / cat / char.d < prev    next >
Text File  |  1997-10-26  |  769b  |  30 lines
  1. DEFINITION MODULE Char;
  2.  
  3. (*
  4.     Dieses Modul stellt zwei Tabellen zur Verfgung, die die Umwandlung von
  5.     Kleinbuchstaben in Grožbuchstaben und umgekehrt unter Bercksichtigung
  6.     der nationalen Sonderzeichen erm”glichen.
  7. *)
  8.  
  9. TYPE
  10.     tpTable = POINTER TO ARRAY CHAR OF CHAR;
  11.  
  12. PROCEDURE pUpper (): tpTable;
  13. (*
  14.     Liefert einen Zeiger auf eine Tabelle, die zu jedem Zeichen das zugeh”rige
  15.     'grože Zeichen' liefert, d. h. bei kleinen Buchstaben den entsprechenden
  16.     Grožbuchstaben.
  17. *)
  18.  
  19. PROCEDURE pLower (): tpTable;
  20. (*
  21.     Liefert einen Zeiger auf eine Tabelle, die zu jedem Zeichen das zugeh”rige
  22.     'kleine Zeichen' liefert, d. h. bei grožen Buchstaben den entsprechenden
  23.     Kleinbuchstaben.
  24. *)
  25.  
  26. END Char.
  27.             
  28.     
  29.     
  30.